www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\administrators\D_chk_edit_user.asp

    <%


'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="../css.css" type=text/css rel=stylesheet>
<%

dir_set="../../"


%>


<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->

<!--#include file=../../inc/ajaxLIB.asp-->

<!--#include file=../inc/checkadmin2.asp-->

<!--#include file=../../inc/functionFiless.asp-->


<!--#include file="../../inc/new_md5.asp"-->


<%
AJAXshowLoader()


%>



	<%
biao="[ND_channel]"
biao2="[ND_admin]"
sys_content_type=trim(request("sys_content_type"))

err1=0






if request("umaxd")="" or isnumeric(request("umaxd"))=0 then



err1=1
%>
<script language="javascript">
alert("每天可以上传多少个文件 必须为数字且必填");
history.go(-1);

</script>



<%




end if




Function ChkNumeric(CHECK_ID)
		IF CHECK_ID = "1" or CHECK_ID =1 Then
			ChkNumeric = "1"
		Else
			ChkNumeric = "0"
		End If
		
		if CHECK_ID ="" then
		
		ChkNumeric = "0"
		end if
		
	End Function

Function ChkFormStr(ByVal str)
		Dim fString
		fString = str
		If IsNull(fString) Then
			ChkFormStr = ""
			Exit Function
		End If
		fString = Replace(fString, "'", "&#39;")
		fString = Replace(fString, Chr(34), "&quot;")
		fString = Replace(fString, Chr(13), "")
		fString = Replace(fString, Chr(10), "")
		fString = Replace(fString, Chr(9), "")
		fString = Replace(fString, ">", "&gt;")
		fString = Replace(fString, "<", "&lt;")
		fString = Replace(fString, "&nbsp;", " ")
		ChkFormStr = fString
	End Function


 Function Formatime(ByVal datime)
	datime = Trim(Replace(Trim(datime), vbNewLine, ""))
	If Not IsDate(datime) Then
		Formatime = Now()
		Exit Function
	End If
	If Len(datime) < 11 Then
		Formatime = CDate(datime & " " & FormatDateTime(Now, 3))
	Else
		Formatime = CDate(datime)
	End If
	Exit Function
End Function

sssfff=""


sssfff=sssfff&"gaipwd,0,"&request("sa2")




biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"Article"&"' and is_link_class='0'   and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"Article,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))&","&request("a3_"&cstr(rs441("id")))&","&request("a4_"&cstr(rs441("id")))&","&request("a5_"&cstr(rs441("id")))&","&request("a6_"&cstr(rs441("id")))&","&request("a7_"&cstr(rs441("id")))&","&request("a8_"&cstr(rs441("id")))
		
		
		
		

rs441.movenext

loop

rs441.close
set rs441=nothing







biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"down"&"' and is_link_class='0'   and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"down,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))&","&request("a3_"&cstr(rs441("id")))&","&request("a4_"&cstr(rs441("id")))&","&request("a5_"&cstr(rs441("id")))&","&request("a6_"&cstr(rs441("id")))&","&request("a7_"&cstr(rs441("id")))&","&request("a8_"&cstr(rs441("id")))&","&request("a9_"&cstr(rs441("id")))

rs441.movenext

loop

rs441.close
set rs441=nothing













biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"pic_or_sp"&"' and is_link_class='0'   and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"pic_or_sp,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))&","&request("a3_"&cstr(rs441("id")))&","&request("a4_"&cstr(rs441("id")))&","&request("a5_"&cstr(rs441("id")))&","&request("a6_"&cstr(rs441("id")))&","&request("a7_"&cstr(rs441("id")))&","&request("a8_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing

















biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"cp"&"' and is_link_class='0'   and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"cp,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))&","&request("a3_"&cstr(rs441("id")))&","&request("a4_"&cstr(rs441("id")))&","&request("a5_"&cstr(rs441("id")))&","&request("a6_"&cstr(rs441("id")))&","&request("a7_"&cstr(rs441("id")))&","&request("a8_"&cstr(rs441("id")))&","&request("a9_"&cstr(rs441("id")))

rs441.movenext

loop

rs441.close
set rs441=nothing























biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"dan_Article"&"' and is_link_class='0'  and   is_qiye=0  order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"dan_Article,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))&","&request("a3_"&cstr(rs441("id")))&","&request("a4_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing










biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"wdan_Article"&"' and is_link_class='0'  and   is_qiye=0  order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"wdan_Article,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing













biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&"info_feedback"&"' and is_link_class='0'   and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&"info_feedback,"&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing














ssxsdsffr="buy"
biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&ssxsdsffr&"' and is_link_class='0'  and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&ssxsdsffr&","&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing


ssxsdsffr="guestbook"
biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&ssxsdsffr&"' and is_link_class='0'  and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&ssxsdsffr&","&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing



ssxsdsffr="askprod"
biao="ND_channel"

set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where lanmu_type='"&ssxsdsffr&"' and is_link_class='0'  and   is_qiye=0 order by clng(orders) asc",conn,1,1

do while not rs441.eof 
		
		sssfff=sssfff&"|"&ssxsdsffr&","&rs441("id")&","&request("a1_"&cstr(rs441("id")))&","&request("a2_"&cstr(rs441("id")))
		

rs441.movenext

loop

rs441.close
set rs441=nothing

















sssfff=sssfff&"|"&"qitashezhi123,0,"&request("u1")&","&request("umaxd")&","&request("db1")&","&request("ly2")&","&request("ql4")&","&request("mmm8")&","&request("lll9")&","&request("cj5")&","&request("qt6")&","&request("cd7")&","&request("job71")&","&request("tt71")&","&request("ddd71")&","&request("ddd711")



%>





<%
if err1=0 then
set rs2222=server.CreateObject("adodb.recordset")


  
  
rs2222.open "select * from "&biao2&" where id="&request("id"),conn,1,3



'1|


rs2222("quanxian_settings")=sssfff

rs2222("is_ok")=request("cc11")

rs2222.update
%>

<script language="javascript">
alert("修改成功");

self.location="D_admin_user.asp";

</script>



<%


end if
%>



<%
AJAXcloseLoader()
%>